home *** CD-ROM | disk | FTP | other *** search
- object ThumbForm: TThumbForm
- Left = 350
- Top = 185
- BorderStyle = bsDialog
- Caption = 'Image pre-viewer'
- ClientHeight = 373
- ClientWidth = 580
- Color = clBtnFace
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clBlack
- Font.Height = -11
- Font.Name = 'Arial'
- Font.Style = []
- OldCreateOrder = True
- Position = poScreenCenter
- OnActivate = FormActivate
- OnClose = FormClose
- PixelsPerInch = 96
- TextHeight = 14
- object Panel1: TPanel
- Left = 0
- Top = 0
- Width = 580
- Height = 373
- Align = alClient
- TabOrder = 0
- object StopBtn: TSpeedButton
- Left = 499
- Top = 288
- Width = 75
- Height = 30
- Glyph.Data = {
- 66010000424D6601000000000000760000002800000014000000140000000100
- 040000000000F000000000000000000000001000000010000000000000000000
- BF0000BF000000BFBF00BF000000BF00BF00BFBF0000C0C0C000808080000000
- FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777777777777
- 7777777700007777711111111177777700007777199999999917777700007771
- 9999999999917777000077199999999999991777000071999999999999999177
- 000019999999999999999917000019FFF99F99FFF9F9991700001999F99F99F9
- F9F99917000019FFF99F99F9F9FFF917000019F9999F99F9F9F9F917000019FF
- F9FFF9FFF9FFF917000019999999999999999917000019999999999999999917
- 0000719999999999999991770000771999999999999917770000777199999999
- 9991777700007777199999999917777700007777711111111177777700007777
- 77777777777777770000}
- Visible = False
- OnClick = AbortBtnClick
- end
- object Image1: TImage
- Left = 519
- Top = 140
- Width = 35
- Height = 33
- Center = True
- Picture.Data = {<image000.bmp>}
- Stretch = True
- OnDragDrop = Image1DragDrop
- OnDragOver = Image1DragOver
- end
- object Thumbs: TStringGrid
- Left = 168
- Top = 47
- Width = 324
- Height = 301
- DefaultColWidth = 60
- DefaultRowHeight = 50
- FixedCols = 0
- RowCount = 10
- FixedRows = 0
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clBlack
- Font.Height = -9
- Font.Name = 'Arial'
- Font.Style = []
- Options = [goVertLine, goHorzLine]
- ParentColor = True
- ParentFont = False
- ScrollBars = ssVertical
- TabOrder = 0
- OnClick = ThumbsClick
- OnDblClick = ThumbsDblClick
- OnDragDrop = ThumbsDragDrop
- OnDragOver = ThumbsDragOver
- OnDrawCell = ThumbsDrawCell
- OnKeyDown = ThumbsKeyDown
- OnMouseDown = ThumbsMouseDown
- OnMouseMove = ThumbsMouseMove
- end
- object DriveComboBox1: TDriveComboBox
- Left = 7
- Top = 328
- Width = 157
- Height = 21
- Color = clBtnFace
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clBtnText
- Font.Height = -12
- Font.Name = 'Times New Roman'
- Font.Style = []
- ParentFont = False
- TabOrder = 1
- OnChange = DriveComboBox1Change
- OnClick = DriveComboBox1Click
- end
- object DirectoryListBox1: TDirectoryListBox
- Left = 8
- Top = 191
- Width = 155
- Height = 134
- Color = clBtnFace
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clBtnText
- Font.Height = -12
- Font.Name = 'Times New Roman'
- Font.Style = []
- ItemHeight = 16
- ParentFont = False
- TabOrder = 2
- OnChange = DirectoryListBox1Change
- OnClick = DirectoryListBox1Click
- end
- object FileListBox1: TFileListBox
- Left = 8
- Top = 47
- Width = 153
- Height = 141
- Hint = 'Drag Image on the grid to create thumbnail'
- Color = clBtnFace
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clBtnText
- Font.Height = -12
- Font.Name = 'Times New Roman'
- Font.Style = []
- ItemHeight = 16
- Mask =
- '*.gif;*.jpg;*.pcx;*.bmp;*.wmf;*.ico;*.scm;*.png;*.cms;*.tif;*.pc' +
- 'd;*.dxf;*.tga;*.eps'
- ParentFont = False
- ShowGlyphs = True
- TabOrder = 3
- OnChange = FileListBox1Change
- OnClick = FileListBox1Click
- OnDblClick = FileListBox1DblClick
- OnKeyDown = FileListBox1KeyDown
- OnMouseDown = FileListBox1MouseDown
- end
- object ComboBox1: TComboBox
- Left = 8
- Top = 10
- Width = 154
- Height = 22
- Color = clBtnFace
- DropDownCount = 15
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clBtnText
- Font.Height = -11
- Font.Name = 'Times New Roman'
- Font.Style = []
- ItemHeight = 14
- ParentFont = False
- TabOrder = 4
- Text = 'Select file type'
- OnChange = ComboBox1Change
- OnClick = ComboBox1Click
- Items.Strings = (
- '*.JPG;*.GIF;*.PCX;*.BMP;*.PNG;*.TIF;*.WMF;*.ICO;*.PCD'
- '*.JPG'
- '*.GIF'
- '*.PCX'
- '*.BMP'
- '*.PNG'
- '*.TIF'
- '*.PCD'
- '*.WMF'
- '*.ICO')
- end
- object PMultiImage2: TPMultiImage
- Left = 506
- Top = 47
- Width = 60
- Height = 50
- GrabHandCursor = 5
- Center = True
- Scrolling = True
- ShowScrollbars = True
- B_W_CopyFlags = [C_DEL]
- Color = clBtnFace
- ImageName = 'file not found'
- ImageDither = True
- ImageReadRes = lAutoMatic
- BlitMode = sLight
- ImageWriteRes = sAutoMatic
- TifSaveCompress = sNONE
- TiffPage = 1
- TiffAppend = False
- JPegSaveQuality = 25
- JPegSaveSmooth = 5
- RubberBandBtn = mbLeft
- ScrollbarWidth = 12
- ParentColor = True
- TextLeft = 0
- TextTop = 0
- TextRotate = 0
- TabOrder = 5
- TabStop = False
- Visible = False
- ZoomBy = 10
- end
- object PMultiImage1: TPMultiImage
- Left = 506
- Top = 47
- Width = 60
- Height = 50
- GrabHandCursor = 5
- Center = True
- Scrolling = True
- ShowScrollbars = True
- B_W_CopyFlags = [C_DEL]
- Color = clBtnFace
- ImageName = 'file not found'
- ImageDither = True
- ImageReadRes = lAutoMatic
- BlitMode = sLight
- ImageWriteRes = sAutoMatic
- TifSaveCompress = sNONE
- TiffPage = 1
- TiffAppend = False
- JPegSaveQuality = 25
- JPegSaveSmooth = 5
- RubberBandBtn = mbLeft
- ScrollbarWidth = 12
- ParentColor = True
- Stretch = True
- TextLeft = 0
- TextTop = 0
- TextRotate = 0
- TabOrder = 6
- TabStop = False
- ZoomBy = 10
- end
- object Panel2: TPanel
- Left = 1
- Top = 1
- Width = 578
- Height = 33
- Align = alTop
- BevelInner = bvRaised
- BevelOuter = bvNone
- TabOrder = 7
- object LoadBtn: TSpeedButton
- Left = 1
- Top = 3
- Width = 28
- Height = 28
- Hint = 'Load all existing thumbs'
- Flat = True
- Glyph.Data = {
- F6000000424DF600000000000000760000002800000010000000100000000100
- 0400000000008000000000000000000000001000000010000000000000000000
- BF0000BF000000BFBF00BF000000BF00BF00BFBF0000C0C0C000808080000000
- FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777777777777
- 7777777777777777777777777780087777777800000000000087708800888800
- 880770880888888088077088087888808807708808E78880880770FF00888800
- FF0770FFF000000FFF0770000000000000077700780FF0870077777777800877
- 7777777777777777777777777777777777777777777777777777}
- ParentShowHint = False
- ShowHint = True
- OnClick = LoadBtnClick
- end
- object CreateNewKeep: TSpeedButton
- Left = 29
- Top = 3
- Width = 28
- Height = 28
- Hint = 'Create new previews keep old ones'
- Flat = True
- Glyph.Data = {
- F6000000424DF600000000000000760000002800000010000000100000000100
- 0400000000008000000000000000000000001000000010000000000000000000
- BF0000BF000000BFBF00BF000000BF00BF00BFBF0000C0C0C000808080000000
- FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777777777777
- 77777777777777777777777800000008777777707777777077007770788F8870
- 008077707777777080807770777887707070777078800870F070777080088070
- 00F0007008877070770008088770000877770F07700777777777007007777777
- 7777777777777777777777777777777777777777777777777777}
- ParentShowHint = False
- ShowHint = True
- OnClick = IncAllKeepBtnClick
- end
- object CreateNewDelete: TSpeedButton
- Left = 57
- Top = 3
- Width = 28
- Height = 28
- Hint = 'Create new previews and delete old ones'
- Flat = True
- Glyph.Data = {
- 42010000424D4201000000000000760000002800000011000000110000000100
- 040000000000CC00000000000000000000001000000010000000000000000000
- BF0000BF000000BFBF00BF000000BF00BF00BFBF0000C0C0C000808080000000
- FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777777777777
- 7777700000007000000000000000700000007077770770770770700000007007
- 7077077077007000000070707777770770707000000070770770707707707000
- 0000707770770700777070000000707777007777777070000000707777777777
- 7770700000007077777777700770700000007077777777077070700000007077
- 7777770770707000000070777777777007707000000070777777777777707000
- 0000700000000000000070000000777777777777777770000000777777777777
- 777770000000}
- ParentShowHint = False
- ShowHint = True
- OnClick = CreateNewDeleteClick
- end
- object DeleteAllBtn: TSpeedButton
- Left = 85
- Top = 3
- Width = 28
- Height = 28
- Hint = 'Delete all previews'
- Flat = True
- Glyph.Data = {
- 42010000424D4201000000000000760000002800000011000000110000000100
- 040000000000CC00000000000000000000001000000010000000000000000000
- BF0000BF000000BFBF00BF000000BF00BF00BFBF0000C0C0C000808080000000
- FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777777777777
- 777770000000777777777777777770000000777777777777770F700000007777
- 0F777777777770000000777000F7777770F770000000777000F777770F777000
- 00007777000F77700F777000000077777000F700F7777000000077777700000F
- 7777700000007777777000F777777000000077777700000F7777700000007777
- 7000F70F7777700000007770000F77700F7770000000770000F7777700F77000
- 00007700F7777777700F70000000777777777777777770000000777777777777
- 777770000000}
- ParentShowHint = False
- ShowHint = True
- OnClick = DeleteAllBtnClick
- end
- object ClearAllBtn: TSpeedButton
- Left = 113
- Top = 3
- Width = 28
- Height = 28
- Hint = 'Clear preview window'
- Flat = True
- Glyph.Data = {
- 42010000424D4201000000000000760000002800000011000000110000000100
- 040000000000CC00000000000000000000001000000010000000000000000000
- BF0000BF000000BFBF00BF000000BF00BF00BFBF0000C0C0C000808080000000
- FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777777777777
- 7777700000007777777777177777700000007777777771177777100000007777
- 7777711177717000000077777777771177117000000070000000000011577000
- 0000707777777775117770000000707007007071511770000000707777777711
- 771150000000704444445144447510000000774FFFFF15FFF47770000000774F
- 00F00F00F47770000000774FFFFFFFFFF4777000000077444444444444777000
- 0000774744744744747770000000774444444444447770000000777777777777
- 777770000000}
- ParentShowHint = False
- ShowHint = True
- OnClick = ClearAllBtnClick
- end
- object Autoload: TSpeedButton
- Left = 141
- Top = 3
- Width = 28
- Height = 28
- Hint = 'Autoload Previews'
- AllowAllUp = True
- GroupIndex = 11
- Flat = True
- Glyph.Data = {
- 96010000424D9601000000000000760000002800000018000000180000000100
- 0400000000002001000000000000000000001000000010000000000000000000
- BF0000BF000000BFBF00BF000000BF00BF00BFBF0000C0C0C000808080000000
- FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
- 3333333333333333333330000333333333333333333328888033333383333333
- 3332222288033338888333333332222228033303833833333332262228033000
- 0338333333322A62220333033038333333332222283333333038333333333222
- 2333333330333333333333333333333330333333883333333333333333333338
- 8883333333333888888833880888333333333888888838805088833333380000
- 00883309150883388888C44440883099915033333078CC4440883DD999153000
- 0003C6C4408833DF998333333033CE6C4088333DD83333333333CCCCC0333333
- D333333333333333333333333333333333333333333333333333333333333333
- 3333333333333333333333333333333333333333333333333333}
- ParentShowHint = False
- ShowHint = True
- end
- object GPall: TSpeedButton
- Left = 170
- Top = 2
- Width = 29
- Height = 29
- Hint = 'In 256 color mode use a shared palette'
- AllowAllUp = True
- GroupIndex = 12
- Flat = True
- Glyph.Data = {
- CA010000424DCA01000000000000760000002800000024000000110000000100
- 0400000000005401000000000000000000001000000010000000000000000000
- 80000080000000808000800000008000800080800000C0C0C000808080000000
- FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777777777777
- 7777777777777777777777770000777777777777777777777777777777777777
- 000077993344DDBBEE7777778877887788777777000077993344DDBBEE777777
- 8877887788777777000077993344DDBBEE777777887788778877777700007799
- 3344DDBBEE7777778877887788777777000077993344DDBBEE77777788778877
- 88777777000077993344DDBBEE7777778877887788777777000077993344DDBB
- EE7777778877887788777777000077993344DDBBEE7777778877887788777777
- 000077993344DDBBEE7777778877887788777777000077993344DDBBEE777777
- 8877887788777777000077993344DDBBEE777777887788778877777700007799
- 3344DDBBEE7777778877887788777777000077993344DDBBEE77777788778877
- 88777777000077993344DDBBEE77777788778877887777770000777777777777
- 7777777777777777777777770000}
- NumGlyphs = 2
- ParentShowHint = False
- ShowHint = True
- end
- object RSpeed: TComboBox
- Left = 209
- Top = 5
- Width = 169
- Height = 22
- Style = csDropDownList
- ItemHeight = 14
- TabOrder = 0
- Items.Strings = (
- 'Optimize Previews for Speed'
- 'Optimize Previews for Size')
- end
- object CResolution: TComboBox
- Left = 386
- Top = 5
- Width = 174
- Height = 22
- Style = csDropDownList
- ItemHeight = 14
- TabOrder = 1
- Items.Strings = (
- 'Use 16 system colors resolution'
- 'Use 256 colors resolution'
- 'Use true color resolution'
- 'Use Automatic color resolution')
- end
- end
- object StatusBar1: TStatusBar
- Left = 1
- Top = 353
- Width = 578
- Height = 19
- Panels = <
- item
- Width = 350
- end
- item
- Width = 50
- end>
- SimplePanel = False
- object Gauge1: TProgressBar
- Left = 352
- Top = 3
- Width = 233
- Height = 16
- Min = 0
- Max = 100
- TabOrder = 0
- end
- end
- object CloseBtn: TBitBtn
- Left = 499
- Top = 319
- Width = 75
- Height = 30
- Caption = 'Close'
- TabOrder = 9
- OnClick = CancelBtnClick
- end
- end
- end
-